home *** CD-ROM | disk | FTP | other *** search
/ Celestin Apprentice 5 / Apprentice-Release5.iso / Environments / RAMSES 2.2 / RAMSES 2.2 Extras / AuxLibExtra .DEF / MatReshape.DEF < prev    next >
Encoding:
Modula Definition  |  1996-06-21  |  1.5 KB  |  51 lines  |  [TEXT/MEDT]
  1. DEFINITION MODULE MatReshape;
  2.  
  3.   (*******************************************************************
  4.  
  5.     Module  MatReshape     (Version 1.0)
  6.  
  7.               Copyright ©1993 by Olivier Roth, Andreas Fischlin, 
  8.               and Swiss Federal Institute of Technology Zürich ETHZ 
  9.  
  10.       Purpose: provides some procedures to change the "shape" of
  11.                a matrix, i.e. insert, delete rows and columns
  12.                of matrices.
  13.  
  14.       Remarks: This modulde is part of the Mat-library, which forms 
  15.                  part of the RAMSES package.
  16.               
  17.       Programming
  18.           o Design and Implementation
  19.               O. Roth                 23.04.90
  20.               A. Fischlin            28/Mai/93
  21.               
  22.           Systems Ecology Group
  23.           Swiss Federal Institute of Technology Zurich ETHZ
  24.           Department of Environmental Sciences
  25.           Grabenstr. 3
  26.           CH-8952 Schlieren/Zurich
  27.           Switzerland
  28.  
  29.           Last revision of definition:  28/Mai/93 af
  30.  
  31.   *******************************************************************)
  32.  
  33.   FROM Matrices IMPORT Matrix;
  34.  
  35.  
  36.  
  37.   PROCEDURE InsertMatrixRow( a: Matrix;  nrRow: INTEGER );
  38.   PROCEDURE InsertMatrixCol( a: Matrix;  nrCol: INTEGER );
  39.   (* In case the allocated memory of the matrix is not sufficient,
  40.    * the needed memory will be allocated as needed by the insertion. *) 
  41.  
  42.  
  43.   PROCEDURE DeleteMatrixRow( a: Matrix;  nrRow: INTEGER );
  44.   PROCEDURE DeleteMatrixCol( a: Matrix;  nrCol: INTEGER );
  45.   (* Note, for efficiency reasons, the previously allocated memory 
  46.    * is not released. *) 
  47.  
  48.  
  49.  
  50. END MatReshape.
  51.